home *** CD-ROM | disk | FTP | other *** search
/ Chip 2007 January, February, March & April / Chip-Cover-CD-2007-02.iso / Pakiet bezpieczenstwa / mini Pentoo LiveCD 2006.1 / mpentoo-2006.1.iso / modules / nessus-2.2.8.mo / usr / lib / nessus / plugins / phpgroupware_detect.nasl < prev    next >
Text File  |  2005-01-14  |  2KB  |  82 lines
  1. #
  2. # (C) Tenable Network Security
  3. #
  4.  
  5. if(description)
  6. {
  7.  script_id(15982);
  8.  script_version ("$Revision: 1.1 $");
  9.  name["english"] = "PhpGroupWare Detection"; 
  10.  
  11.  script_name(english:name["english"]);
  12.  
  13.  desc["english"] = "
  14. This check determines the presence of PHPGroupWare, a groupware system
  15. written in  PHP, and store its location and version in the Nessus KB.
  16.  
  17. Risk factor : Low";
  18.  
  19.  script_description(english:desc["english"]);
  20.  
  21.  summary["english"] = "Checks for PhpGroupWare";
  22.  
  23.  script_summary(english:summary["english"]);
  24.  
  25.  script_category(ACT_ATTACK);
  26.  
  27.  
  28.  script_copyright(english:"This script is Copyright (C) 2004 Tenable Network Security");
  29.  family["english"] = "CGI abuses";
  30.  family["francais"] = "Abus de CGI";
  31.  script_family(english:family["english"], francais:family["francais"]);
  32.  script_dependencie("http_version.nasl");
  33.  script_require_ports("Services/www", 80);
  34.  exit(0);
  35. }
  36.  
  37. #
  38. # The script code starts here
  39. #
  40.  
  41. include("http_func.inc");
  42. include("http_keepalive.inc");
  43.  
  44. port = get_http_port(default:80);
  45.  
  46. if(!get_port_state(port)) exit(0);
  47.  
  48.  
  49. function check(url)
  50. {
  51.     req = http_get(item:string(url, "login.php"), port:port);
  52.     r = http_keepalive_send_recv(port:port, data:req);
  53.     if ( r == NULL ) 
  54.         exit(0);
  55.  
  56.         if ("phpGroupWare http://www.phpgroupware.org" >< r)
  57.     {
  58.         version = egrep(pattern:".*phpGroupWare ([0-9.]+).*", string:r);
  59.         if ( version )
  60.         {
  61.          version = ereg_replace(pattern:".*phpGroupWare ([0-9.]+).*", string:version, replace:"\1");
  62.          if ( url == "" ) url = "/";
  63.           set_kb_item(name:"www/" + port + "/phpGroupWare", value:version + " under " + url );
  64.              {
  65.             report = "
  66. phpGroupWare " + version + ", a groupware application written in PHP, is installed on
  67. the remote host under " + url;
  68.              security_note(port:port, data:report);
  69.          }
  70.         }
  71.         }
  72. }
  73.  
  74. check(url:"");
  75. check(url:"/phpgroupware/");
  76. check(url:"/phpgw/");
  77.  
  78. foreach dir (cgi_dirs())
  79. {
  80.  check(url:dir);
  81. }
  82.